
FORTRAN-86 V3.0 CAUTION LIST 



1, Problem: 

The compiler generates an Incorrect call address 
for a function which references itiself recursively. 

Solution: 

Change the function to a subroutine and pass the return 
value in a variable. 

2. Problem: 

The compiler Incorrectly issues a warning message 
"WARNING: F183 PARAMETER TYPE MISMATCH WITH EARLIER 
INVOCATION OF PROCEDURE" for the second and subsequent 
references to a procedures or a function which has been 
specified in the INTERFACE control. 



Solution: 

Check that the parameters are correct and ignore the warning, 

3. Problem: 

Reading or writing a logical variable using an A format 
descriptor will only transfer the least significant byte 
of the logical variable. 

Solution: 

Use an Integer variable in this situation. 

4. Problem: 

Integer constants used in expressions in the I/O list 
of a PRINT or WRITE statement have a length which is 
the minimum required to contain the variable, not the 
default Integer length. 

Solution: 

This should not cause a problem unless you are using 
the Z or B format descriptors. If you are using the 
Z or B format descriptors, use the INT intrinsic function 
to force these constants to the default length. 

5. Problem: 

If the limit plus the increment of a DO loop exceeds 
the range of the index variable, the DO loop will not 
terminate. 

Solution: 

Use a larger index variable or change the DO loop so that 
this will not occur. 
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6. Problem: 



The compiler will generate Incorrect code for an expression 
which causes an INTEGER*! expression to be coerced to 
floating point If a previous Integer expression has been 
coerced to floating point. 



7. Problem: 



The compiler generates Incorrect code when the INTA intrinsic 
(or the INT intrinsic when the STORAGE( INTEGER* A) control Is 
specified) is used in an expression or assignment which causes 
the result of the intrinsic to be coerced to floating point 
and the argument to the intrinsic is any INTEGER*4 constant or 
a negative INTEGER*! or INTEGER*?, constant. 

Solution: 

Remove the INT or INTA reference since it is not necessary 
in this case. 

8. Problem: 

The compiler issues the error message " ERROR: F18! 
INSUFFICIENT SIZE FOR ASSIGN VARIABLE", when assigning 
a format label to an INTEGER*2 variable or using an 
INTEGER*2 variable as the format specifier in an I/O 

statement. 

Solution: 

Use an INTEGER*A variable in this situation. 

9. Problem: 

The compiler will not delete a file which Is opened 
with STATUS » 'NEW' and close with STATUS « 'DELETE'. 
(In lRMX-86 environment only) 

10. Problem: 

The compiler Issues error message "F17A: UNKNOWN CONTROL 
IN SOURCE NEAR" when compiling a program which contains 
compiler control (with argument) at source level. 

Solution: 

This happens only with iRMX-86 Release 6.0 with update 
!.0 or later. To avoid this problem either use lRMX-86 
update 0.0 or update ! ,0 without zap 18 and 19. 
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